home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 49
/
Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso
/
-serious-
/
graphics
/
gnuplot
/
gnuplot-3.7.1doc
/
demo
/
random.dem
< prev
next >
Wrap
Text File
|
1999-11-29
|
873b
|
36 lines
#
# $Id: random.dem,v 1.1.1.1 1998/04/15 19:16:42 lhecking Exp $
#
# random.dem
#
# Lattice test for random numbers;
# If you can see any patterns in this plot, the random number generator
# is not very good.
#
# Permission granted to distribute freely for non-commercial purposes only
#
# Copyright (c) 1991, Jos van der Woude, jvdwoude@hut.nl
seed = 1317
seed = rand(seed)
set nokey
set xrange [0: 1]
set yrange [0: 1]
set zrange [0: 1]
set title "Lattice test for random numbers"
set xlabel "rand(n) ->"
set ylabel "rand(n + 1) ->"
set zlabel "rand(n + 2) ->"
set format x "%3.2f"
set format y "%3.2f"
set format z "%3.2f"
set tics
set sample 1000
set function style dots
set parametric
plot rand(1), rand(1)
pause -1 "Hit return to continue"
pause 0 "3D plot ahead, one moment please ..."
set sample 50
splot rand(1), rand(1), rand(1)
pause -1 "Hit return to continue"